www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\admin_usergroup\D_edit_user.asp
<%
'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************
%>
<LINK href="../css.css" type=text/css rel=stylesheet>
<%
dir_set="../../"
Server.ScriptTimeout = 99999
%>
<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->
<!--#include file=../../inc/ajaxLIB.asp-->
<!--#include file=../inc/checkadmin2.asp-->
<!--#include file=../../inc/functionFiless.asp-->
<%
AJAXshowLoader()
%>
<style type="text/css">
<!--
.STYLE3 {
color: #FFFFFF;
font-weight: bold;
}
-->
</style>
<div id="divProcessing" style="width:200px;height:30px;position:absolute;display:none">
<table border="0" cellpadding="0" cellspacing="1" bgcolor="#000000" width="100%" height="100%"><tr><td bgcolor=#0650D2><marquee align="middle" behavior="alternate" scrollamount="5" style="font-size:9pt"><font color=#FFFFFF>...正在保存远程图片...请等待...</font></marquee></td></tr></table>
</div>
<br />
<div id="l_list" style="filter:blendTrans(duration=1); width:774px; z-index:-1; border: 1px dashed #999999;left: 3px; top: 120px; height: 121px;width:730px">
<%
biao="[ND_user]"
biao2="[ND_userGroup]"
biaosp="[]"
if find_dataw("qitashezhi123","0",14)<>"1" and qx_if_max=0 then
response.redirect "../D_suodinguser.asp"
end if
sys_content_type=trim(request("sys_content_type"))
%>
<script src="../../ND_editor/FCKeditor2_5/FCKeditor.js"></script>
<script type="text/javascript">
<!--
function remoteUpload(o) {
try{
var strText = GetContentHTML() ;
var divProcessing=document.getElementById("divProcessing");
var objField = document.getElementsByName("content_UploadText")[0];
objField.value = strText ;
if (o) {
divProcessing.style.top = 800 ;
divProcessing.style.left = 200 ;
divProcessing.style.display = "";
document.remoteuploadb.submit();
}else{
divProcessing.style.display = "none";
}
}
catch(e){}
}
function remoteUploadok() {
try{
divProcessing.style.display = "none";
}
catch(e){}
}
function GetContentHTML(){
var strHTML ;
try{
var oEditor = FCKeditorAPI.GetInstance('Content') ;
strHTML = oEditor.GetXHTML()
}
catch(e){
strHTML = '';
}
return strHTML
}
var sLinkOriginalFileName = "originalfilename" ;
var sLinkSaveFileName = "savefilename" ;
var sLinkSavePathFileName = "UploadFileList" ;
function addUploadFile(originalFileName, saveFileName, savePathFileName){
doInterfaceUpload(sLinkOriginalFileName, originalFileName);
doInterfaceUpload(sLinkSaveFileName, saveFileName);
doInterfaceUpload(sLinkSavePathFileName, savePathFileName);
}
function doInterfaceUpload(strLinkName, strValue){
if (strValue=="") return;
if (strLinkName){
var objLinkUpload = document.getElementsByName(strLinkName)[0];
if (objLinkUpload){
if (objLinkUpload.value!=""){
objLinkUpload.value = objLinkUpload.value + "|";
}
objLinkUpload.value = objLinkUpload.value + strValue;
objLinkUpload.fireEvent("onchange");
}
}
}
function doChange(objText, objDrop){
if (!objDrop) return;
//if(document.myform.BriefTopic.selectedIndex<2){
// document.myform.BriefTopic.selectedIndex+=1;
//}
var str = objText.value;
var arr = str.split("|");
var nIndex = objDrop.selectedIndex;
objDrop.length=1;
for (var i=0; i<arr.length; i++){
objDrop.options[objDrop.length] = new Option(arr[i], arr[i]);
}
objDrop.selectedIndex = nIndex;
}
//-->
</script>
<script language= JavaScript>
function SelectPic(){
var arr=window.open('../D_select_upload_pic.asp', '', 'titlebar=no, toolbar=no, scrollbar=yes,Width=800, Height=600');
if(arr!=null){
//var ss=arr.split('|');
//document.all.myform.ImageUrl.value=ss[0];
//document.myform.ImageFileList.value=ss[0];
}
else
{
alert("弹出窗口被系统拦截掉了,请修改你系统设置")
}
}
</script>
<form action="D_chk_edit_user.asp" method="post" target="_self" name="myform" id="myform">
<table height="30" width=730 border="0" cellpadding="2" cellspacing="0" bordercolor="#999999" style="border:#999999 1px">
<tr>
<td>
<table width=730 border="0" cellpadding="0" cellspacing="0" bordercolor="#999999">
<tr>
<td height="32" align="center" class="adminth" colspan="4"><span class="STYLE3">用户</span></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from "&biao&" where id="&request("id"),conn,1,3
%>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户名：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<%=rs("username")%>
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户密码：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="pwd" type="password" id="pwd" size="50" value="">
不修改请留空</td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户昵称：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="nick" type="text" id="nick" size="50" value="<%=rs("nick")%>"> </td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户邮箱：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="em" type="text" id="em" size="50" value="<%=rs("email")%>"> </td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户姓别：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input type="radio" name="cc1" value="1" <%if rs("sex")="1" then response.write "checked"%>> 男
<input type="radio" name="cc1" value="0" <%if rs("sex")="0" then response.write "checked"%>> 女
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户状态：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input type="radio" name="cc11" value="1" <%if rs("user_stutas")="1" or rs("user_stutas")="" then response.write "checked"%>> 激活
<input type="radio" name="cc11" value="0" <%if rs("user_stutas")="0" then response.write "checked"%>> 锁定
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>会员类型：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<select name="UserClass">
<option value="0" <%if rs("uesrclass")="0" then response.write "selected"%>>计点会员</option>
<option value="1" <%if rs("uesrclass")="1" then response.write "selected"%>>计时会员</option>
<option value="999" <%if rs("uesrclass")="999" then response.write "selected"%>>到期会员</option>
</select>
<font color="red">*</font> </td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>身份证号码：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="shenfenz" type="text" id="shenfenz" size="50" value="<%=rs("shenfenzheng")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户电话：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="tel" type="text" id="tel" size="50" value="<%=rs("tel")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户QQ：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="QQ" type="text" id="QQ" size="50" value="<%=rs("QQ")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>邮政编码：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="psd" type="text" id="psd" size="50" value="<%=rs("youbian")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>密码问题：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="pwd_wenti" type="text" id="pwd_wenti" size="50" value="<%=rs("pwd_wenti")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>密码答案(不修改请留空)：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="daan" type="text" id="daan" size="50" value=""></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>最后登陆时间：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="LastTime" type="text" id="LastTime" size="25" value="<%=rs("denglu_time")%>">
<font color="red">*(如2008-04-08)</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>最后登陆ip：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="userlastip" type="text" id="userlastip" size="50" value="<%=rs("denglu_ip")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>登陆次数：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="ltm" type="text" id="ltm" size="50" value="<%=rs("denglu_count")%>">
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>注册IP：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="reg_ip" type="text" id="reg_ip" size="50" value="<%=rs("reg_ip")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>到期时间：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="ExpireTime" type="text" id="ExpireTime" size="25" value="<%=rs("daoqi_time")%>">
<font color="red">*(如2008-04-08)</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户头像：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<% for i=1 to 5 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<br>
<% for i=6 to 10 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<br>
<% for i=11 to 15 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<br>
<% for i=16 to 20 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<% for i=21 to 25 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<% for i=26 to 30 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
<br>
<% for i=31 to 35 %>
<img src="/images/touxiang/image<%=i%>.GIF" align="absmiddle" width="60" height="60"> <input type="radio" name="face" value='/images/touxiang/Image<%=i%>.gif'
<% if ("/images/touxiang/Image"&cstr(int(i))&".gif")=rs("touxiang") then
response.write " checked onClick='faceb.value=this.value;'>"
else
response.write " onClick='faceb.value=this.value;'>"
end if
%>
<%next%>
</td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>自定义头像地址：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="faceb" type="text" id="faceb" size="50" value="<%=rs("touxiang")%>"></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>所属用户组：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<select size="1" name="group">
<%
set rs2=server.CreateObject("adodb.recordset")
rs2.open "select * from "&biao2&" order by clng(grades) asc",conn,1,1
do while not rs2.eof
%>
<option value='<%=rs2("id")%>' <%if cstr(rs2("id"))=cstr(rs("lever_id")) then response.write "selected"%>><%=rs2("name")%></option>
<%rs2.movenext
loop
%>
</select>
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户点数：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="dian" type="text" id="dian" size="50" value="<%=rs("dianshuo")%>">
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户购物余额(单位:元)：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="deposita" type="text" id="deposita" size="50" value="<%=rs("deposit")%>">
<font color="red">*</font></td>
</tr>
<tr>
<td width="250" height="27" align="center" bgcolor="#ffffff"><strong>用户购物积分：</strong></td>
<td width="480" align="left" bgcolor="#EDF8FE" colspan="3">
<input name="scorea" type="text" id="scorea" size="50" value="<%=rs("score")%>">
<font color="red">*</font></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#D5EFFD" colspan="4">
<input type="submit" value="修 改" /></td>
</tr>
<tr>
<td height="80" align="center" bgcolor="#ffffff" colspan="4"></td>
</tr>
</table>
</td>
</tr>
</table>
<input type="hidden" name="sys_content_type" value="<%=request("sys_content_type")%>"/>
<input type="hidden" name="id" value="<%=request("id")%>"/>
</form>
<form name="remoteuploadb" id="remoteuploadb" action="../D_remoteupload.asp" method="post" target="remoteupload">
<input type="hidden" name="content_UploadText" value=""/>
</form>
<iframe name="remoteupload" width="0" height="0"></iframe>
</div>
<script language=javascript>
AJAXfade(1,'l_list')
</script>
<%
AJAXcloseLoader()
%>